← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 15:33:55 2022
Reported on Wed Dec 14 15:40:04 2022

Filename(eval 265)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 66 statements in 174µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
282164µs64µsJSON::Schema::Modern::Document::::metaschema_uri JSON::Schema::Modern::Document::metaschema_uri
11146µs61µsJSON::Schema::Modern::Document::::BEGIN@5.116 JSON::Schema::Modern::Document::BEGIN@5.116
1114µs4µsMethod::Generate::Accessor::_Generated::::BEGIN@10.117Method::Generate::Accessor::_Generated::BEGIN@10.117
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
221µs my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
310s my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4 package JSON::Schema::Modern::Document;
5246µs276µs
# spent 61µs (46+15) within JSON::Schema::Modern::Document::BEGIN@5.116 which was called: # once (46µs+15µs) by Sub::Quote::_clean_eval at line 5
no warnings 'closure';
# spent 61µs making 1 call to JSON::Schema::Modern::Document::BEGIN@5.116 # spent 15µs making 1 call to warnings::unimport
6
# spent 64µs within JSON::Schema::Modern::Document::metaschema_uri which was called 28 times, avg 2µs/call: # 14 times (34µs+0s) by JSON::Schema::Modern::Document::traverse at line 178 of JSON/Schema/Modern/Document.pm, avg 2µs/call # 14 times (30µs+0s) by JSON::Schema::Modern::Document::traverse at line 192 of JSON/Schema/Modern/Document.pm, avg 2µs/call
sub metaschema_uri {
7 ($_QUOTED,$_UNQUOTED) if 0;
8# BEGIN quote_sub PRELUDE
9package Method::Generate::Accessor::_Generated;
10
# spent 4µs within Method::Generate::Accessor::_Generated::BEGIN@10.117 which was called: # once (4µs+0s) by Sub::Quote::_clean_eval at line 15
BEGIN {
1110s $^H = 1762;
1210s ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1314µs %^H = (
14 );
15143µs14µs}
16# END quote_sub PRELUDE
172819µs Carp::croak("metaschema_uri is a read-only accessor") if @_ > 1;
182856µs$_[0]->{"metaschema_uri"} }
1910s $$_UNQUOTED = \&metaschema_uri;
20}
2115µs1;
22
23;